home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Developer Source 6
/
developer source - volume 6.iso
/
aiexp
/
feb95
/
cona14.gif
< prev
next >
Tile
Graphics Interchange Format
|
1997-01-12
|
45.7 KB
|
652x327
|
4-bit (16 colors)
ocr:
FIGURE 4. Expanding on the object- oriented cosign. NODE GETVALUEO 0; (JOB 1) GETSUBNODESO = 0; (JOB: 2) FUNCTION : NODE VALUE NODE INTM_NUMBEROFPARAMETERS; FUNCTION-MIFUNCTION RETURNED VALUE GETVALUEO POINTED TO; GETVALUE GETVALUEO ON CHILD NODES: GETVALUEO PASS (CALL RESULTS IN CALL TOM_FUNCTION; RETURN SELF;) RETURN RESULTS; GETSUBTREEO (CALL GETSUBTREE ON CHILD NODES;) VARIABLE: : VALUE CONSTANT: :VALUE,